! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
! 
! Utility Data Module File
! 
! Generated by KPP-2.2.3 symbolic chemistry Kinetics PreProcessor
!       (http://www.cs.vt.edu/~asandu/Software/KPP)
! KPP is distributed under GPL, the general public licence
!       (http://www.gnu.org/copyleft/gpl.html)
! (C) 1995-1997, V. Damian & A. Sandu, CGRER, Univ. Iowa
! (C) 1997-2005, A. Sandu, Michigan Tech, Virginia Tech
!     With important contributions from:
!        M. Damian, Villanova University, USA
!        R. Sander, Max-Planck Institute for Chemistry, Mainz, Germany
! 
! File                 : aromatics_kpp_Monitor.f90
! Time                 : Thu Dec 17 19:38:34 2020
! Working directory    : /n/home08/kbates/Aromatics/MOZART
! Equation file        : aromatics_kpp.kpp
! Output root filename : aromatics_kpp
! 
! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~



MODULE aromatics_kpp_Monitor


  CHARACTER(LEN=15), PARAMETER, DIMENSION(90) :: SPC_NAMES_0 = (/ &
     'C2H4           ','CO2            ','DHDN           ', &
     'IMAE           ','ISN1OG         ','LVOC           ', &
     'MBO            ','MBOOO          ','PMNO2          ', &
     'PYAC           ','H              ','MNO3           ', &
     'RCOOH          ','BRO2           ','XRO2           ', &
     'TRO2           ','LISOPOH        ','LISOPNO3       ', &
     'LBENZ          ','LTOLU          ','LXYLE          ', &
     'PGLYX          ','PCH2O          ','PMGLY          ', &
     'PEPX           ','PPHEN          ','PCSL           ', &
     'PBZALD         ','PDCB1          ','PDCB2          ', &
     'O1D            ','CH4m           ','C3H8           ', &
     'DHDC           ','N2O5           ','PMNN           ', &
     'PPN            ','PBZNIT         ','BENZ           ', &
     'BEPOMUC        ','PHENOL         ','IEPOXD         ', &
     'HNO2           ','TOLU           ','CRESOL         ', &
     'XYLE           ','TEPOMUC        ','XYLOL          ', &
     'CH4            ','COm            ','ALK4           ', &
     'IEPOXA         ','IEPOXB         ','C2H6           ', &
     'BZALD          ','MAP            ','C6H5OOH        ', &
     'MPN            ','MPNm           ','IMAO3          ', &
     'MP             ','RA3P           ','RB3P           ', &
     'MPm            ','BIGALD2        ','BIGALD4        ', &
     'BZOOH          ','HNO4           ','PHENOOH        ', &
     'ETP            ','H2             ','BIGALD1        ', &
     'BENZOOH        ','BIGALD3        ','BZOO           ', &
     'PHENO2         ','XYLOLOOH       ','PAN            ', &
     'RP             ','O              ','PP             ', &
     'PRPN           ','PHENO          ','XYLOLO2        ', &
     'EOH            ','H2O2           ','R4P            ', &
     'HPALD          ','ATOOH          ','ACBZO2         ' /)
  CHARACTER(LEN=15), PARAMETER, DIMENSION(90) :: SPC_NAMES_1 = (/ &
     'BENZO2         ','DHPCARP        ','RIPB           ', &
     'VRP            ','HC187          ','HPC52O2        ', &
     'IAP            ','HCOOH          ','MRP            ', &
     'MOBA           ','C6H5O2         ','DHMOB          ', &
     'RIPA           ','RIPD           ','TOLOOH         ', &
     'ISNP           ','TOLO2          ','MALO2          ', &
     'ETHLN          ','MAOP           ','XYLENOOH       ', &
     'XYLENO2        ','DICARBO2       ','MDIALO2        ', &
     'INPN           ','MVKOO          ','NPMN           ', &
     'MOHm           ','CH3CHOO        ','GAOO           ', &
     'MGLYOO         ','MOBAOO         ','DIBOO          ', &
     'IPMN           ','ROH            ','MACRNO2        ', &
     'MGLOO          ','ACET           ','MACROO         ', &
     'ISOPNB         ','CH2OO          ','ISOP           ', &
     'PRPE           ','ACTA           ','HNO3           ', &
     'MVKN           ','ISNOHOO        ','IEPOXOO        ', &
     'MOH            ','ISNOOB         ','CH2Om          ', &
     'GLYX           ','MACRN          ','ISOPNDO2       ', &
     'A3O2           ','PROPNN         ','MAN2           ', &
     'ISOPNBO2       ','ISNOOA         ','GLYC           ', &
     'MAOPO2         ','B3O2           ','VRO2           ', &
     'ISOPND         ','ATO2           ','HC5OO          ', &
     'PO2            ','PRN1           ','NMAO3          ', &
     'KO2            ','ETO2           ','CH2O           ', &
     'ISN1           ','MRO2           ','MGLY           ', &
     'HC5            ','RIO2           ','HAC            ', &
     'MACR           ','INO2           ','R4O2           ', &
     'ALD2           ','R4N1           ','MVK            ', &
     'O3             ','RCHO           ','MO2m           ', &
     'RCO3           ','NO             ','MEK            ' /)
  CHARACTER(LEN=15), PARAMETER, DIMENSION(10) :: SPC_NAMES_2 = (/ &
     'MO2            ','MCO3           ','NO3            ', &
     'R4N2           ','NO2            ','CO             ', &
     'OH             ','HO2            ','H2O            ', &
     'O2             ' /)
  CHARACTER(LEN=15), PARAMETER, DIMENSION(190) :: SPC_NAMES = (/&
    SPC_NAMES_0, SPC_NAMES_1, SPC_NAMES_2 /)

  INTEGER, PARAMETER, DIMENSION(190) :: LOOKAT = (/ &
       1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11, 12, &
      13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, &
      25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, &
      37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, &
      49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, &
      61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, &
      73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, &
      85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, &
      97, 98, 99,100,101,102,103,104,105,106,107,108, &
     109,110,111,112,113,114,115,116,117,118,119,120, &
     121,122,123,124,125,126,127,128,129,130,131,132, &
     133,134,135,136,137,138,139,140,141,142,143,144, &
     145,146,147,148,149,150,151,152,153,154,155,156, &
     157,158,159,160,161,162,163,164,165,166,167,168, &
     169,170,171,172,173,174,175,176,177,178,179,180, &
     181,182,183,184,185,186,187,188,189,190 /)

  INTEGER, DIMENSION(1) :: MONITOR
  CHARACTER(LEN=15), DIMENSION(1) :: SMASS
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_0 = (/ &
     '             O --> O3                                                                               ', &
     '        O + O3 --> O2                                                                               ', &
     '        O + NO --> NO2                                                                              ', &
     '       O + NO2 --> NO                                                                               ', &
     '       O + NO2 --> NO3                                                                              ', &
     '           O1D --> O                                                                                ', &
     '       O3 + NO --> NO2                                                                              ', &
     '      O3 + NO2 --> NO3                                                                              ', &
     '          2 NO --> 2 NO2                                                                            ', &
     '      NO + NO3 --> 2 NO2                                                                            ', &
     '     NO3 + NO2 --> NO + NO2                                                                         ', &
     '     NO3 + NO2 --> N2O5                                                                             ', &
     '           O1D --> 2 OH                                                                             ', &
     '       O3 + OH --> HO2                                                                              ', &
     '       H2 + OH --> HO2                                                                              ', &
     '     H2O2 + OH --> HO2                                                                              ', &
     '      O3 + HO2 --> OH                                                                               ', &
     '      OH + HO2 --> O2                                                                               ', &
     '         2 HO2 --> H2O2                                                                             ', &
     '       NO + OH --> HNO2                                                                             ', &
     '      NO2 + OH --> HNO3                                                                             ', &
     '      NO3 + OH --> NO2 + HO2                                                                        ', &
     '      NO + HO2 --> NO2 + OH                                                                         ', &
     '     NO2 + HO2 --> HNO4                                                                             ', &
     '     HNO4 + OH --> NO2                                                                              ', &
     '     NO3 + HO2 --> NO2 + OH                                                                         ', &
     '     HNO2 + OH --> NO2                                                                              ', &
     '     HNO3 + OH --> NO3                                                                              ', &
     '            O3 --> O1D                                                                              ', &
     '            O3 --> O                                                                                ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_1 = (/ &
     '          H2O2 --> 2 OH                                                                             ', &
     '           NO2 --> O + NO                                                                           ', &
     '           NO3 --> NO                                                                               ', &
     '           NO3 --> O + NO2                                                                          ', &
     '          HNO2 --> NO + OH                                                                          ', &
     '          HNO3 --> NO2 + OH                                                                         ', &
     '         2 NO3 --> 2 NO2 + O2                                                                       ', &
     '          N2O5 --> NO3 + NO2 + O2                                                                   ', &
     '          HNO4 --> 0.05 NO3 + 0.95 NO2 + 0.05 OH + 0.95 HO2                                         ', &
     '          N2O5 --> NO3 + NO2                                                                        ', &
     '          HNO4 --> NO2 + HO2                                                                        ', &
     '      CH4 + OH --> MO2 + H2O                                                                        ', &
     '      NO + MO2 --> CH2O + NO2 + HO2                                                                 ', &
     '     MO2 + HO2 --> MP + O2                                                                          ', &
     '         2 MO2 --> MOH + CH2O + O2                                                                  ', &
     '         2 MO2 --> 2 CH2O + 2 HO2                                                                   ', &
     '     MO2 + NO2 --> MPN                                                                              ', &
     '           MPN --> MO2 + NO2                                                                        ', &
     '       MP + OH --> MO2 + H2O                                                                        ', &
     '       MP + OH --> CH2O + OH + H2O                                                                  ', &
     '     CH2O + OH --> PCH2O + CO + HO2 + H2O                                                           ', &
     '    CH2O + NO3 --> HNO3 + CO + HO2                                                                  ', &
     '      MOH + OH --> CH2O + HO2                                                                       ', &
     '       CO + OH --> CO2 + HO2                                                                        ', &
     '            MP --> CH2O + OH + HO2                                                                  ', &
     '          CH2O --> PCH2O + CO + 2 HO2                                                               ', &
     '          CH2O --> PCH2O + H2 + CO                                                                  ', &
     '           MPN --> CH2O + NO3 + HO2                                                                 ', &
     '           MPN --> MO2 + NO2 + O2                                                                   ', &
     '     CH4m + OH --> MO2m + H2O                                                                       ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_2 = (/ &
     '     MO2m + NO --> CH2Om + NO2 + HO2                                                                ', &
     '    MO2m + HO2 --> MPm + O2                                                                         ', &
     '        2 MO2m --> MOHm + CH2Om + O2                                                                ', &
     '        2 MO2m --> 2 CH2Om + 2 HO2                                                                  ', &
     '    MO2m + MO2 --> 0.5 MOHm + 0.5 MOH + 0.5 CH2Om + 0.5 CH2O                                        ', &
     '    MO2m + MO2 --> CH2Om + CH2O + 2 HO2                                                             ', &
     '    MO2m + NO2 --> MPNm                                                                             ', &
     '          MPNm --> MO2m + NO2                                                                       ', &
     '      MPm + OH --> MO2m + H2O                                                                       ', &
     '      MPm + OH --> CH2Om + OH + H2O                                                                 ', &
     '    CH2Om + OH --> COm + HO2 + H2O                                                                  ', &
     '   CH2Om + NO3 --> COm + HNO3 + HO2                                                                 ', &
     '     MOHm + OH --> CH2Om + HO2                                                                      ', &
     '      COm + OH --> CO2 + HO2                                                                        ', &
     '           MPm --> CH2Om + OH + HO2                                                                 ', &
     '         CH2Om --> COm + 2 HO2                                                                      ', &
     '         CH2Om --> COm + H2                                                                         ', &
     '          MPNm --> CH2Om + NO3 + HO2                                                                ', &
     '          MPNm --> MO2m + NO2 + O2                                                                  ', &
     '   A3O2 + MO2m --> 0.25 MOHm + 0.25 ROH + 0.75 CH2Om + 0.75 RCHO + HO2 ... etc.                     ', &
     '    PO2 + MO2m --> 0.25 MOHm + 0.25 ROH + 0.75 CH2Om + 0.5 CH2O + 0.16 HAC ... etc.                 ', &
     '   ETO2 + MO2m --> 0.25 EOH + 0.25 MOHm + 0.75 CH2Om + 0.75 ALD2 + HO2 ... etc.                     ', &
     '   R4O2 + MO2m --> 0.25 MOHm + 0.25 ROH + 0.16 ACET + 0.75 CH2Om + 0.03 A3O2 ... etc.               ', &
     '   R4N1 + MO2m --> 0.25 MOHm + 0.25 ROH + 0.75 CH2Om + 0.2 CH2O + 0.15 R4O2 ... etc.                ', &
     '   ATO2 + MO2m --> 0.5 PMGLY + 0.5 MOHm + 0.5 CH2Om + 0.5 MGLY + 0.2 HAC ... etc.                   ', &
     '    KO2 + MO2m --> 0.25 MOHm + 0.25 ROH + 0.75 CH2Om + 0.5 ALD2 + 0.25 MEK ... etc.                 ', &
     '   B3O2 + MO2m --> 0.25 MOHm + 0.25 ROH + 0.75 ACET + 0.75 CH2Om + HO2 ... etc.                     ', &
     '   PRN1 + MO2m --> 0.25 MOHm + 0.25 ROH + 0.75 CH2Om + 0.5 CH2O + 0.5 ALD2 ... etc.                 ', &
     '   MO2m + RCO3 --> CH2Om + ETO2 + HO2                                                               ', &
     '   MO2m + RCO3 --> RCOOH + CH2Om                                                                    ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_3 = (/ &
     '   MO2m + MCO3 --> CH2Om + MO2 + HO2                                                                ', &
     '   MO2m + MCO3 --> ACTA + CH2Om                                                                     ', &
     '    ATOOH + OH --> ATO2 + H2O                                                                       ', &
     '    ATOOH + OH --> PMGLY + MGLY + OH + H2O                                                          ', &
     '    HCOOH + OH --> CO2 + HO2 + H2O                                                                  ', &
     '     ALD2 + OH --> 0.05 CH2O + 0.95 MCO3 + 0.05 CO + 0.05 HO2 + H2O                                 ', &
     '    ALD2 + NO3 --> HNO3 + MCO3                                                                      ', &
     '    MCO3 + NO2 --> PAN                                                                              ', &
     '           PAN --> MCO3 + NO2                                                                       ', &
     '     NO + MCO3 --> CO2 + MO2 + NO2                                                                  ', &
     '     C2H6 + OH --> ETO2 + H2O                                                                       ', &
     '     ETO2 + NO --> ALD2 + NO2 + HO2                                                                 ', &
     '     C3H8 + OH --> B3O2                                                                             ', &
     '     C3H8 + OH --> A3O2                                                                             ', &
     '     A3O2 + NO --> RCHO + NO2 + HO2                                                                 ', &
     '      PO2 + NO --> CH2O + ALD2 + NO2 + HO2                                                          ', &
     '     ALK4 + OH --> R4O2                                                                             ', &
     '     R4O2 + NO --> 0.32 ACET + 0.05 A3O2 + 0.18 B3O2 + 0.32 ETO2 + 0.32 ALD2 ... etc.               ', &
     '     R4O2 + NO --> R4N2                                                                             ', &
     '     R4N1 + NO --> 0.57 CH2O + 0.86 ALD2 + 0.57 RCHO + 2 NO2                                        ', &
     '     ATO2 + NO --> CH2O + MCO3 + NO2                                                                ', &
     '      KO2 + NO --> 0.93 ALD2 + 0.93 MCO3 + 0.07 R4N2 + 0.93 NO2                                     ', &
     '     RIO2 + NO --> 0.03 DIBOO + 0.081 ISOPNB + 0.009 ISOPND + 0.82 CH2O ... etc.                    ', &
     '          RIO2 --> 0.5 HPALD + 0.5 DHPCARP                                                          ', &
     '     VRO2 + NO --> 0.12 MVKN + 0.53 GLYC + 0.35 CH2O + 0.35 MGLY + 0.53 MCO3 ... etc.               ', &
     '     MRO2 + NO --> 0.15 MACRN + 0.122 CH2O + 0.122 MGLY + 0.728 HAC + 0.85 NO2 ... etc.             ', &
     '          MRO2 --> HAC + CO + OH                                                                    ', &
     '     MAN2 + NO --> 0.5 PROPNN + 0.5 CH2O + 0.5 MGLY + 1.5 NO2 + 0.5 CO ... etc.                     ', &
     '     B3O2 + NO --> ACET + NO2 + HO2                                                                 ', &
     '     INO2 + NO --> 0.07 CH2O + 0.7 ISN1 + 0.23 HC5 + 0.035 MACR + 0.035 MVK ... etc.                ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_4 = (/ &
     '    INO2 + NO3 --> 0.07 CH2O + 0.7 ISN1 + 0.23 HC5 + 0.035 MACR + 0.035 MVK ... etc.                ', &
     '    ISN1 + NO3 --> 0.6 HNO3 + 0.4 ISNOOB + 0.6 ISNOOA                                               ', &
     '  ISNOOA + NO3 --> 0.04 ISN1OG + 0.96 PROPNN + NO2 + CO + HO2                                       ', &
     '   ISNOOA + NO --> 0.04 ISN1OG + 0.96 PROPNN + NO2 + CO + HO2                                       ', &
     '  ISNOOA + NO2 --> 0.04 ISN1OG + 0.96 IPMN                                                          ', &
     '  ISNOOA + HO2 --> 0.04 ISN1OG + 0.25 RCOOH + 0.75 RP + 0.25 O3 + 0.96 NO2 ... etc.                 ', &
     '  ISNOOB + NO3 --> 0.04 ISN1OG + GLYX + 0.94 PROPNN + 2 NO2                                         ', &
     '   ISNOOB + NO --> 0.04 ISN1OG + 0.94 GLYX + 0.9 PROPNN + 1.88 NO2                                  ', &
     '  ISNOOB + HO2 --> 0.04 ISN1OG + 0.96 INPN                                                          ', &
     '  ISNOOB + MO2 --> 0.04 ISN1OG + 0.25 MOH + 0.7 GLYX + 0.66 PROPNN + 0.75 CH2O ... etc.             ', &
     '     ISN1 + O3 --> 0.25 MOH + 0.7 GLYX + 0.3 PROPNN + 0.75 CH2O + 0.7 NO2 ... etc.                  ', &
     '     ISN1 + OH --> 0.655 ISNOHOO + 0.345 ISNOOA                                                     ', &
     '  ISNOHOO + NO --> 0.04 ISN1OG + 0.919 GLYX + 0.894 PROPNN + 0.934 HO2 ... etc.                     ', &
     ' ISNOHOO + HO2 --> 0.04 ISN1OG + 0.96 INPN                                                          ', &
     ' ISNOHOO + MO2 --> 0.04 ISN1OG + 0.25 MOH + 0.7 GLYX + 0.66 PROPNN + 0.75 CH2O ... etc.             ', &
     '        2 INO2 --> 0.5 ISOPND + 0.07 CH2O + 1.2 ISN1 + 0.23 HC5 + 0.035 MACR ... etc.               ', &
     '     PRN1 + NO --> CH2O + ALD2 + 2 NO2                                                              ', &
     '    ALK4 + NO3 --> HNO3 + R4O2                                                                      ', &
     '     R4N2 + OH --> R4N1 + H2O                                                                       ', &
     '     ACTA + OH --> CO2 + MO2 + H2O                                                                  ', &
     '     RCHO + OH --> RCO3 + H2O                                                                       ', &
     '    RCO3 + NO2 --> PPN                                                                              ', &
     '           PPN --> RCO3 + NO2                                                                       ', &
     '   IMAO3 + NO2 --> IPMN                                                                             ', &
     '   NMAO3 + NO2 --> NPMN                                                                             ', &
     '          IPMN --> IMAO3 + NO2                                                                      ', &
     '          NPMN --> NMAO3 + NO2                                                                      ', &
     '     RCO3 + NO --> ETO2 + NO2                                                                       ', &
     '    NMAO3 + NO --> CO2 + 0.5 CH2O + 0.5 MO2 + 0.5 MCO3 + NO2 + 0.5 CO                               ', &
     '    RCHO + NO3 --> HNO3 + RCO3                                                                      ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_5 = (/ &
     '     ACET + OH --> ATO2 + H2O                                                                       ', &
     '    A3O2 + MO2 --> 0.25 ROH + 0.25 MOH + 0.75 CH2O + 0.75 RCHO + HO2                                ', &
     '     PO2 + MO2 --> 0.25 ROH + 0.25 MOH + 1.25 CH2O + 0.16 HAC + 0.5 ALD2 ... etc.                   ', &
     '    R4O2 + HO2 --> R4P                                                                              ', &
     '    R4N1 + HO2 --> R4N2                                                                             ', &
     '    ATO2 + HO2 --> 0.85 ATOOH + 0.15 CH2O + 0.15 MCO3 + 0.15 OH                                     ', &
     '     KO2 + HO2 --> 0.85 ATOOH + 0.15 ALD2 + 0.15 MCO3 + 0.15 OH                                     ', &
     '    RIO2 + HO2 --> 0.272 RIPB + 0.628 RIPA + 0.037 RIPD + 0.063 CH2O + 0.025 MACR ... etc.          ', &
     '    VRO2 + HO2 --> 0.1 VRP + 0.578 GLYC + 0.102 CH2O + 0.102 MGLY + 0.033 RCHO ... etc.             ', &
     '    MRO2 + HO2 --> MRP                                                                              ', &
     '    MAN2 + HO2 --> 0.85 MAOP + 0.075 PROPNN + 0.075 CH2O + 0.075 MGLY + 0.925 NO2 ... etc.          ', &
     '    B3O2 + HO2 --> RB3P                                                                             ', &
     '    INO2 + HO2 --> INPN                                                                             ', &
     '    PRN1 + HO2 --> PRPN                                                                             ', &
     '      MEK + OH --> KO2 + H2O                                                                        ', &
     '    ETO2 + MO2 --> 0.25 EOH + 0.25 MOH + 0.75 CH2O + 0.75 ALD2 + HO2                                ', &
     '     MEK + NO3 --> HNO3 + KO2                                                                       ', &
     '    R4O2 + MO2 --> 0.25 ROH + 0.16 ACET + 0.25 MOH + 0.03 A3O2 + 0.09 B3O2 ... etc.                 ', &
     '    R4N1 + MO2 --> 0.25 ROH + 0.25 MOH + 0.95 CH2O + 0.15 R4O2 + 0.38 ALD2 ... etc.                 ', &
     '    ATO2 + MO2 --> 0.5 PMGLY + 0.5 MOH + 0.5 CH2O + 0.5 MGLY + 0.2 HAC ... etc.                     ', &
     '     KO2 + MO2 --> 0.25 ROH + 0.25 MOH + 0.75 CH2O + 0.5 ALD2 + 0.25 MEK ... etc.                   ', &
     '    RIO2 + MO2 --> 0.24 ROH + 0.24 MOH + 1.22 CH2O + 0.3 HC5 + 0.18 MACR ... etc.                   ', &
     '        2 RIO2 --> 0.09 DIBOO + 0.75 CH2O + 1.11 HC5 + 0.29 MACR + 0.45 MVK ... etc.                ', &
     '   HC5OO + MO2 --> 0.09 H2 + 0.25 ROH + 0.25 MOH + 0.13 GLYC + 0.95 CH2O ... etc.                   ', &
     '    VRO2 + MO2 --> 0.25 ROH + 0.25 MOH + 0.36 GLYC + 0.89 CH2O + 0.14 MGLY ... etc.                 ', &
     '    MRO2 + MO2 --> 0.15 ROH + 1.255 CH2O + 0.255 MGLY + 0.595 HAC + 0.595 CO ... etc.               ', &
     '    MAN2 + MO2 --> 0.375 PROPNN + 0.625 CH2O + 0.375 MGLY + 0.25 R4N2 + 0.375 NO2 ... etc.          ', &
     '    B3O2 + MO2 --> 0.25 ROH + 0.75 ACET + 0.25 MOH + 0.75 CH2O + HO2                                ', &
     '    INO2 + MO2 --> 0.25 MOH + 0.25 ISOPND + 0.785 CH2O + 0.6 ISN1 + 0.115 HC5 ... etc.              ', &
     '    PRN1 + MO2 --> 0.25 ROH + 0.25 MOH + 1.25 CH2O + 0.5 ALD2 + 0.25 RCHO ... etc.                  ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_6 = (/ &
     '      EOH + OH --> ALD2 + HO2                                                                       ', &
     '      ROH + OH --> RCHO + HO2                                                                       ', &
     '        2 ETO2 --> 2 ALD2 + 2 HO2                                                                   ', &
     '        2 ETO2 --> EOH + ALD2                                                                       ', &
     '    ETO2 + HO2 --> ETP                                                                              ', &
     '    A3O2 + HO2 --> RA3P                                                                             ', &
     '     PO2 + HO2 --> PP                                                                               ', &
     '    MCO3 + HO2 --> 0.41 MAP + 0.15 ACTA + 0.15 O3 + 0.44 MO2 + 0.44 OH ... etc.                     ', &
     '    RCO3 + HO2 --> 0.15 RCOOH + 0.41 RP + 0.44 ETO2 + 0.15 O3 + 0.44 OH ... etc.                    ', &
     '   NMAO3 + HO2 --> 0.41 MAOP + 0.59 CH2O + 0.15 O3 + 0.39 MO2 + 0.39 CO ... etc.                    ', &
     '     PRPE + OH --> PO2                                                                              ', &
     '     PRPE + O3 --> 0.1 CH4 + 0.12 CH3CHOO + 0.12 CH2OO + 0.5 CH2O + 0.5 ALD2 ... etc.               ', &
     '     NPMN + OH --> HAC + NO2 + CO                                                                   ', &
     '     IPMN + OH --> 0.781 IMAE + 0.19 PAN + 0.19 CH2O + 0.03 HAC + 0.81 NO3 ... etc.                 ', &
     '     NPMN + O3 --> CH2O + MCO3 + NO3                                                                ', &
     '     IMAE + OH --> OH                                                                               ', &
     '     GLYC + OH --> 0.361 CO2 + 0.134 PGLYX + 0.134 HCOOH + 0.134 GLYX + 0.732 CH2O ... etc.         ', &
     '     GLYC + OH --> HCOOH + CO + OH                                                                  ', &
     '    PRPE + NO3 --> PRN1                                                                             ', &
     '     GLYX + OH --> 2 CO + HO2                                                                       ', &
     '     MGLY + OH --> MCO3 + CO                                                                        ', &
     '    GLYX + NO3 --> HNO3 + 2 CO + HO2                                                                ', &
     '    MGLY + NO3 --> HNO3 + MCO3 + CO                                                                 ', &
     '     ISOP + OH --> LISOPOH + RIO2                                                                   ', &
     '      MVK + OH --> VRO2                                                                             ', &
     '     MACR + OH --> 0.53 IMAO3 + 0.47 MRO2                                                           ', &
     '      HAC + OH --> PMGLY + MGLY + HO2                                                               ', &
     '      HAC + OH --> 0.5 CO2 + 0.5 HCOOH + 0.5 ACTA + 0.5 MO2 + 0.5 CO + OH ... etc.                  ', &
     '   A3O2 + MCO3 --> RCHO + MO2 + HO2                                                                 ', &
     '    PO2 + MCO3 --> CH2O + ALD2 + MO2 + HO2                                                          ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_7 = (/ &
     '   A3O2 + MCO3 --> ACTA + RCHO                                                                      ', &
     '    PO2 + MCO3 --> ACTA + 0.65 HAC + 0.35 RCHO                                                      ', &
     '     ISOP + O3 --> 0.044 MVKOO + 0.044 MACROO + 0.11 CH2OO + 0.102 PRPE ... etc.                    ', &
     '      MVK + O3 --> 0.12 MGLOO + 0.12 CH2OO + 0.6 CH2O + 0.5 MGLY + 0.1 ALD2 ... etc.                ', &
     '     MACR + O3 --> 0.022 MGLYOO + 0.326 CH2OO + 0.12 CH2O + 0.88 MGLY + 0.098 MCO3 ... etc.         ', &
     '    ISOP + NO3 --> LISOPNO3 + INO2                                                                  ', &
     '    MACR + NO3 --> MAN2                                                                             ', &
     '    MACR + NO3 --> 0.5 IMAO3 + 0.5 MAOP + 0.5 HNO3 + 0.5 MRO2 + 0.5 CO ... etc.                     ', &
     '    RCO3 + MO2 --> ETO2 + CH2O + HO2                                                                ', &
     '   NMAO3 + MO2 --> 2 CH2O + MCO3 + HO2                                                              ', &
     '    RCO3 + MO2 --> RCOOH + CH2O                                                                     ', &
     '   NMAO3 + MO2 --> RCOOH + CH2O                                                                     ', &
     '     INPN + OH --> MEK + NO2 + OH                                                                   ', &
     '     INPN + OH --> 0.36 INO2 + 0.64 R4N2 + 0.64 OH                                                  ', &
     '     PRPN + OH --> 0.791 PROPNN + 0.209 PRN1 + 0.791 OH                                             ', &
     '      ETP + OH --> 0.36 ETO2 + 0.64 ALD2 + 0.64 OH                                                  ', &
     '     RA3P + OH --> 0.36 A3O2 + 0.64 RCHO + 0.64 OH                                                  ', &
     '     RB3P + OH --> 0.791 ACET + 0.209 B3O2 + 0.791 OH                                               ', &
     '      R4P + OH --> 0.209 R4O2 + 0.791 RCHO + 0.791 OH                                               ', &
     '       RP + OH --> RCO3                                                                             ', &
     '       PP + OH --> 0.209 PO2 + 0.791 HAC + 0.791 OH                                                 ', &
     '     RIPA + OH --> 0.007 LVOC + 0.243 HC5 + 0.75 RIO2 + 0.125 OH + 0.125 H2O ... etc.               ', &
     '     RIPB + OH --> 0.007 LVOC + 0.513 HC5 + 0.48 RIO2 + 0.26 OH + 0.26 H2O ... etc.                 ', &
     '     RIPD + OH --> 0.007 LVOC + 0.743 HC5 + 0.25 RIO2 + 0.375 OH + 0.375 H2O ... etc.               ', &
     '     RIPA + OH --> 0.007 LVOC + 0.578 IEPOXA + 0.272 IEPOXB + 0.143 HC5OO ... etc.                  ', &
     '     RIPB + OH --> 0.68 IEPOXA + 0.32 IEPOXB + OH                                                   ', &
     '     RIPD + OH --> 0.007 LVOC + 0.5 IEPOXD + 0.493 HC5OO + 0.5 OH                                   ', &
     '     LVOC + OH --> OH                                                                               ', &
     '   IEPOXA + OH --> IEPOXOO                                                                          ', &
     '   IEPOXB + OH --> IEPOXOO                                                                          ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_8 = (/ &
     '   IEPOXD + OH --> IEPOXOO                                                                          ', &
     ' IEPOXOO + HO2 --> 1.172 CO2 + 0.44 HC187 + 0.278 HCOOH + 0.085 GLYX + 0.025 GLYC ... etc.          ', &
     '  IEPOXOO + NO --> 0.858 CO2 + 0.473 HC187 + 0.142 HCOOH + 0.088 GLYX + 0.088 GLYC ... etc.         ', &
     '      IAP + OH --> 0.654 DHMOB + 0.346 HC5OO + 0.654 OH                                             ', &
     '      VRP + OH --> 0.209 VRO2 + 0.791 MEK + 0.791 OH                                                ', &
     '      MRP + OH --> MRO2                                                                             ', &
     '      MRP + OH --> CO2 + HAC + OH                                                                   ', &
     '     MAOP + OH --> NMAO3                                                                            ', &
     '     MAOP + OH --> MAOPO2                                                                           ', &
     ' MAOPO2 + MCO3 --> 2 CO2 + HAC + MO2 + OH                                                           ', &
     ' MAOPO2 + MCO3 --> ACTA + MEK                                                                       ', &
     '  MAOPO2 + MO2 --> 0.7 CO2 + 0.3 ROH + CH2O + 0.7 HAC + 0.7 OH + 0.7 HO2 ... etc.                   ', &
     '      2 MAOPO2 --> 2 CO2 + 2 HAC + 2 OH                                                             ', &
     '  MAOPO2 + HO2 --> CO2 + HAC + 2 OH                                                                 ', &
     '   MAOPO2 + NO --> CO2 + HAC + NO2 + OH                                                             ', &
     '   MAOPO2 + NO --> HNO3                                                                             ', &
     '      MAP + OH --> MCO3                                                                             ', &
     '    C2H6 + NO3 --> HNO3 + ETO2                                                                      ', &
     '      HC5 + O3 --> 0.055 GAOO + 0.055 MGLYOO + 0.5 GLYC + 0.445 CH2O + 0.5 MGLY ... etc.            ', &
     '        2 MCO3 --> 2 MO2                                                                            ', &
     '    MO2 + MCO3 --> CH2O + MO2 + HO2                                                                 ', &
     '    MO2 + MCO3 --> ACTA + CH2O                                                                      ', &
     '   R4O2 + MCO3 --> 0.32 ACET + 0.05 A3O2 + 0.18 B3O2 + 0.32 ETO2 + 0.32 ALD2 ... etc.               ', &
     '   ATO2 + MCO3 --> CH2O + MO2 + MCO3                                                                ', &
     '    KO2 + MCO3 --> ALD2 + MO2 + MCO3                                                                ', &
     '   RIO2 + MCO3 --> CO2 + 0.113 DIBOO + 0.747 CH2O + 0.14 HC5 + 0.294 MACR ... etc.                  ', &
     '  HC5OO + MCO3 --> 0.17 MOBA + 0.29 DHMOB + 0.216 GLYX + 0.234 GLYC + 0.234 MGLY ... etc.           ', &
     '   VRO2 + MCO3 --> 0.6 GLYC + 0.4 CH2O + 0.4 MGLY + MO2 + 0.6 MCO3 + 0.4 HO2 ... etc.               ', &
     '   MRO2 + MCO3 --> 0.143 CH2O + 0.143 MGLY + 0.857 HAC + MO2 + 0.857 CO ... etc.                    ', &
     '   B3O2 + MCO3 --> ACET + MO2 + HO2                                                                 ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_9 = (/ &
     '   R4N1 + MCO3 --> 0.39 CH2O + 0.3 R4O2 + 0.75 ALD2 + 0.57 RCHO + MO2 + NO2 ... etc.                ', &
     '   MAN2 + MCO3 --> CO2 + 0.5 PROPNN + 0.5 CH2O + 0.5 MGLY + MO2 + 0.5 NO2 ... etc.                  ', &
     '   INO2 + MCO3 --> 0.07 CH2O + 0.7 ISN1 + 0.23 HC5 + 0.035 MACR + 0.035 MVK ... etc.                ', &
     '   PRN1 + MCO3 --> CH2O + ALD2 + MO2 + NO2                                                          ', &
     '   R4O2 + MCO3 --> ACTA + MEK                                                                       ', &
     '   ATO2 + MCO3 --> PMGLY + ACTA + MGLY                                                              ', &
     '    KO2 + MCO3 --> ACTA + MEK                                                                       ', &
     '   RIO2 + MCO3 --> ACTA + MEK                                                                       ', &
     '  HC5OO + MCO3 --> ACTA + MEK                                                                       ', &
     '   VRO2 + MCO3 --> ACTA + MEK                                                                       ', &
     '   MRO2 + MCO3 --> ACTA + MEK                                                                       ', &
     '   R4N1 + MCO3 --> ACTA + RCHO + NO2                                                                ', &
     '   MAN2 + MCO3 --> ACTA + RCHO + NO2                                                                ', &
     '   INO2 + MCO3 --> ACTA + RCHO + NO2                                                                ', &
     '   PRN1 + MCO3 --> ACTA + RCHO + NO2                                                                ', &
     '   B3O2 + MCO3 --> ACET + ACTA                                                                      ', &
     '   ETO2 + MCO3 --> ALD2 + MO2 + HO2                                                                 ', &
     '   ETO2 + MCO3 --> ACTA + ALD2                                                                      ', &
     '   RCO3 + MCO3 --> ETO2 + MO2                                                                       ', &
     '  NMAO3 + MCO3 --> CH2O + MO2 + MCO3                                                                ', &
     '   ISOPNB + O3 --> 0.36 CO2 + 0.16 HCOOH + 0.41 HNO3 + 0.21 MVKN + 0.32 MACRN ... etc.              ', &
     '   ISOPND + O3 --> 0.63 CO2 + 0.09 EOH + 0.26 ETHLN + 0.3 HNO3 + 0.24 MOH ... etc.                  ', &
     '      HC5 + OH --> HC5OO                                                                            ', &
     '    HC5OO + NO --> 0.17 MOBA + 0.29 DHMOB + 0.216 GLYX + 0.234 GLYC + 0.234 MGLY ... etc.           ', &
     '    HC5OO + NO --> HNO3                                                                             ', &
     '   HC5OO + HO2 --> 0.1 IAP + 0.9 GLYC + 0.9 MGLY + 0.9 OH + 0.9 HO2                                 ', &
     '   ISOPND + OH --> 0.1 IEPOXD + 0.9 ISOPNDO2 + 0.1 NO2                                              ', &
     '   ISOPNB + OH --> 0.067 IEPOXA + 0.033 IEPOXB + 0.9 ISOPNBO2 + 0.1 NO2 ... etc.                    ', &
     ' ISOPNDO2 + NO --> 0.27 DHDN + 0.057 HCOOH + 0.21 ETHLN + 0.075 MVKN + 0.019 MACRN ... etc.         ', &
     'ISOPNDO2 + HO2 --> 0.5 ISNP + 0.2 ETHLN + 0.06 MVKN + 0.01 MACRN + 0.23 PROPNN ... etc.             ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_10 = (/ &
     ' ISOPNBO2 + NO --> 0.21 DHDN + 0.26 MVKN + 0.44 MACRN + 0.09 GLYC + 0.7 CH2O ... etc.               ', &
     'ISOPNBO2 + HO2 --> 0.51 ISNP + 0.16 MVKN + 0.28 MACRN + 0.06 GLYC + 0.44 CH2O ... etc.              ', &
     '     ISNP + OH --> 0.193 ISOPNDO2 + 0.193 ISOPNBO2 + 0.612 R4N1 + 0.612 OH ... etc.                 ', &
     '     MVKN + OH --> 0.35 PYAC + 0.65 HCOOH + 0.35 CH2O + 0.65 MGLY + NO3 ... etc.                    ', &
     '    MACRN + OH --> MACRNO2                                                                          ', &
     '  MACRNO2 + NO --> 0.93 CO2 + 0.07 HCOOH + 0.08 ACTA + 0.08 CH2O + 0.07 MGLY ... etc.               ', &
     ' MACRNO2 + HO2 --> 0.93 CO2 + 0.07 HCOOH + 0.08 ACTA + 0.08 CH2O + 0.07 MGLY ... etc.               ', &
     ' MACRNO2 + NO2 --> PMNN                                                                             ', &
     '          PMNN --> MACRNO2 + NO2                                                                    ', &
     '    DHMOB + OH --> 0.5 HAC + 0.5 MEK + 1.5 CO + HO2                                                 ', &
     '    DIBOO + NO --> 0.48 GLYX + 0.52 GLYC + 0.52 MGLY + 0.48 HAC + NO2 + HO2 ... etc.                ', &
     '    DIBOO + NO --> HNO3                                                                             ', &
     '   DIBOO + HO2 --> 0.85 R4P + 0.072 GLYX + 0.078 GLYC + 0.078 MGLY + 0.072 HAC ... etc.             ', &
     '     MOBA + OH --> MOBAOO                                                                           ', &
     '   MOBAOO + NO --> CO2 + RCHO + NO2 + HO2                                                           ', &
     '   MOBAOO + NO --> HNO3                                                                             ', &
     '  MOBAOO + HO2 --> 0.5 CO2 + 0.5 R4P + 0.5 RCHO + 0.5 OH + 0.5 HO2                                  ', &
     '     MOBA + O3 --> CO2 + MEK + OH + HO2                                                             ', &
     '    ETHLN + OH --> CO2 + CH2O + NO2                                                                 ', &
     '   PROPNN + OH --> PMGLY + MGLY + NO2                                                               ', &
     '    CH2OO + CO --> CH2O                                                                             ', &
     '    CH2OO + NO --> CH2O + NO2                                                                       ', &
     '   CH2OO + NO2 --> CH2O + NO3                                                                       ', &
     '   CH2OO + H2O --> H2O2 + CH2O                                                                      ', &
     '   CH2OO + H2O --> HCOOH                                                                            ', &
     '   MACROO + CO --> MACR                                                                             ', &
     '   MACROO + NO --> MACR + NO2                                                                       ', &
     '  MACROO + NO2 --> MACR + NO3                                                                       ', &
     '  MACROO + H2O --> MRP                                                                              ', &
     '  MACROO + H2O --> H2O2 + MACR                                                                      ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_11 = (/ &
     '    MVKOO + CO --> MVK                                                                              ', &
     '    MVKOO + NO --> MVK + NO2                                                                        ', &
     '   MVKOO + NO2 --> MVK + NO3                                                                        ', &
     '   MVKOO + H2O --> H2O2 + MVK                                                                       ', &
     '   MGLYOO + CO --> MGLY                                                                             ', &
     '   MGLYOO + NO --> MGLY + NO2                                                                       ', &
     '  MGLYOO + NO2 --> MGLY + NO3                                                                       ', &
     '  MGLYOO + H2O --> H2O2 + MGLY                                                                      ', &
     '    MGLOO + CO --> MGLY                                                                             ', &
     '    MGLOO + NO --> MGLY + NO2                                                                       ', &
     '   MGLOO + NO2 --> MGLY + NO3                                                                       ', &
     '   MGLOO + H2O --> MO2 + MCO3                                                                       ', &
     '   MGLOO + H2O --> H2O2 + MGLY                                                                      ', &
     '  CH3CHOO + CO --> ALD2                                                                             ', &
     '  CH3CHOO + NO --> ALD2 + NO2                                                                       ', &
     ' CH3CHOO + NO2 --> ALD2 + NO3                                                                       ', &
     ' CH3CHOO + H2O --> H2O2 + ALD2                                                                      ', &
     ' CH3CHOO + H2O --> ACTA                                                                             ', &
     '     GAOO + CO --> GLYC                                                                             ', &
     '     GAOO + NO --> GLYC + NO2                                                                       ', &
     '    GAOO + NO2 --> GLYC + NO3                                                                       ', &
     '    GAOO + H2O --> H2O2 + GLYC                                                                      ', &
     '    GAOO + H2O --> HAC                                                                              ', &
     '    HC187 + OH --> CH2O + 0.5 MGLY + 0.5 MCO3 + 0.5 CO + 0.5 HO2                                    ', &
     '    HPALD + OH --> 0.085 CO2 + 0.365 HPC52O2 + 0.085 GLYX + 0.55 CH2O + 0.55 MGLY ... etc.          ', &
     '  DHPCARP + NO --> GLYX + MGLY + NO2 + OH                                                           ', &
     '  HPC52O2 + NO --> GLYX + MGLY + NO2 + OH                                                           ', &
     ' DHPCARP + HO2 --> RCOOH                                                                            ', &
     ' HPC52O2 + HO2 --> RCOOH                                                                            ', &
     '       DHPCARP --> RCOOH + CO + OH                                                                  ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_12 = (/ &
     '       DHPCARP --> DHDC                                                                             ', &
     '          ALD2 --> 0.88 MO2 + 0.12 MCO3 + 0.88 CO + HO2                                             ', &
     '           PAN --> 0.3 MO2 + 0.7 MCO3 + 0.3 NO3 + 0.7 NO2                                           ', &
     '          RCHO --> ETO2 + CO + HO2                                                                  ', &
     '          ACET --> MO2 + MCO3                                                                       ', &
     '          ACET --> 2 MO2 + CO                                                                       ', &
     '           MEK --> 0.85 ETO2 + 0.15 RCO3 + 0.15 MO2 + 0.85 MCO3                                     ', &
     '          GLYC --> 0.1 MOH + 0.9 CH2O + CO + 0.07 OH + 1.73 HO2                                     ', &
     '          GLYX --> 2 CO + 2 HO2                                                                     ', &
     '          GLYX --> H2 + 2 CO                                                                        ', &
     '          GLYX --> CH2O + CO                                                                        ', &
     '          MGLY --> MCO3 + CO + HO2                                                                  ', &
     '           MVK --> PRPE + CO                                                                        ', &
     '           MVK --> CH2O + MCO3 + CO + HO2                                                           ', &
     '           MVK --> RCO3 + MO2                                                                       ', &
     '          MACR --> CH2O + MCO3 + CO + HO2                                                           ', &
     '           HAC --> CH2O + MCO3 + HO2                                                                ', &
     '          INPN --> RCHO + NO2 + OH + HO2                                                            ', &
     '          PRPN --> RCHO + NO2 + OH + HO2                                                            ', &
     '           ETP --> ALD2 + OH + HO2                                                                  ', &
     '          RA3P --> RCHO + OH + HO2                                                                  ', &
     '          RB3P --> ACET + OH + HO2                                                                  ', &
     '           R4P --> RCHO + OH + HO2                                                                  ', &
     '            PP --> CH2O + ALD2 + OH + HO2                                                           ', &
     '            RP --> ALD2 + OH + HO2                                                                  ', &
     '          RIPA --> 0.005 LVOC + 0.71 CH2O + 0.275 HC5 + 0.285 MACR + 0.425 MVK ... etc.             ', &
     '          RIPB --> 0.005 LVOC + 0.71 CH2O + 0.275 HC5 + 0.285 MACR + 0.425 MVK ... etc.             ', &
     '          RIPD --> 0.005 LVOC + 0.71 CH2O + 0.275 HC5 + 0.285 MACR + 0.425 MVK ... etc.             ', &
     '           IAP --> 0.19 H2 + 0.26 GLYC + 0.58 MGLY + 0.36 HAC + 0.67 CO ... etc.                    ', &
     '          ISNP --> RCHO + NO2 + OH + HO2                                                            ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_13 = (/ &
     '           VRP --> 0.7 GLYC + 0.3 CH2O + 0.3 MGLY + 0.7 MCO3 + OH + 0.3 HO2 ... etc.                ', &
     '           MRP --> 0.5 CH2O + HAC + 0.5 CO + OH + HO2                                               ', &
     '          MAOP --> CH2O + MCO3 + OH                                                                 ', &
     '          R4N2 --> 0.32 ACET + 0.05 A3O2 + 0.18 B3O2 + 0.32 ETO2 + 0.32 ALD2 ... etc.               ', &
     '           MAP --> MO2 + OH                                                                         ', &
     '         MACRN --> 0.5 CH2O + MGLY + HAC + NO2 + 0.5 CO + HO2                                       ', &
     '          MVKN --> GLYC + MCO3 + NO2                                                                ', &
     '        ISOPNB --> HC5 + NO2 + HO2                                                                  ', &
     '        ISOPND --> HC5 + NO2 + HO2                                                                  ', &
     '        PROPNN --> CH2O + MO2 + NO2 + CO                                                            ', &
     '         ATOOH --> CH2O + MCO3 + OH                                                                 ', &
     '          IPMN --> 0.4 CO2 + 0.6 IMAO3 + 0.4 CH2O + 0.4 MCO3 + 0.4 NO3 ... etc.                     ', &
     '         ETHLN --> CH2O + NO2 + CO + HO2                                                            ', &
     '          DHDC --> GLYX + MGLY + 2 OH                                                               ', &
     '         HPALD --> 0.11 GLYC + 0.5 MGLY + 0.39 HAC + 0.11 MCO3 + 1.89 CO ... etc.                   ', &
     '          ISN1 --> 0.25 GLYX + 0.5 GLYC + CH2O + 0.25 MGLY + 0.5 HAC + NO2 ... etc.                 ', &
     '     TOLU + OH --> LTOLU + 0.1 PEPX + 0.18 PCSL + 0.18 CRESOL + 0.1 TEPOMUC ... etc.                ', &
     '     BENZ + OH --> LBENZ + 0.12 PEPX + 0.53 PPHEN + 0.12 BEPOMUC + 0.53 PHENOL ... etc.             ', &
     '     XYLE + OH --> LXYLE + 0.23 PEPX + 0.15 PCSL + 0.23 TEPOMUC + 0.15 XYLOL ... etc.               ', &
     '  ACBZO2 + HO2 --> 0.4 C6H5O2 + 0.4 OH                                                              ', &
     '   ACBZO2 + NO --> C6H5O2 + NO2                                                                     ', &
     '  BENZO2 + HO2 --> BENZOOH                                                                          ', &
     '   BENZO2 + NO --> PGLYX + 0.5 PDCB1 + 0.5 BIGALD2 + GLYX + NO2 + HO2                               ', &
     '  BENZOOH + OH --> BENZO2                                                                           ', &
     '    BZALD + OH --> ACBZO2                                                                           ', &
     '    BZOO + HO2 --> BZOOH                                                                            ', &
     '    BZOOH + OH --> BZOO                                                                             ', &
     '     BZOO + NO --> PBZALD + BZALD + NO2 + HO2                                                       ', &
     '  C6H5O2 + HO2 --> C6H5OOH                                                                          ', &
     '   C6H5O2 + NO --> PHENO + NO2                                                                      ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_14 = (/ &
     '  C6H5OOH + OH --> C6H5O2                                                                           ', &
     '   CRESOL + OH --> 0.2 PHENO2 + 0.07 PHENO + 0.73 HO2                                               ', &
     'DICARBO2 + HO2 --> 0.07 PMGLY + 0.07 MGLY + 0.33 MO2 + 0.07 CO + 0.4 OH ... etc.                    ', &
     ' DICARBO2 + NO --> 0.17 PMGLY + 0.17 MGLY + 0.83 MO2 + NO2 + 0.17 CO + 0.17 HO2 ... etc.            ', &
     'DICARBO2 + NO2 --> O2                                                                               ', &
     '   MALO2 + HO2 --> 0.16 PGLYX + 0.16 GLYX + 0.16 CO + 0.16 HO2                                      ', &
     '    MALO2 + NO --> 0.4 PGLYX + 0.4 GLYX + NO2 + 0.4 CO                                              ', &
     '   MALO2 + NO2 --> O2                                                                               ', &
     ' MDIALO2 + HO2 --> 0.07 PGLYX + 0.07 PMGLY + 0.07 GLYX + 0.07 MGLY + 0.07 MO2 ... etc.              ', &
     '  MDIALO2 + NO --> 0.17 PGLYX + 0.17 PMGLY + 0.17 GLYX + 0.17 MGLY + 0.17 MO2 ... etc.              ', &
     ' MDIALO2 + NO2 --> O2                                                                               ', &
     '  PHENO2 + HO2 --> PHENOOH                                                                          ', &
     '   PHENO2 + NO --> 0.7 PGLYX + 0.7 GLYX + NO2 + HO2                                                 ', &
     '   PHENOL + OH --> 0.14 PHENO2 + 0.06 PHENO + 0.8 HO2                                               ', &
     '   PHENO + NO2 --> O2                                                                               ', &
     '    PHENO + O3 --> C6H5O2                                                                           ', &
     '  PHENOOH + OH --> PHENO2                                                                           ', &
     '  ACBZO2 + NO2 --> PBZNIT                                                                           ', &
     '   TOLO2 + HO2 --> TOLOOH                                                                           ', &
     '    TOLO2 + NO --> 0.6 PGLYX + 0.4 PMGLY + 0.2 PDCB1 + 0.4 PDCB2 + 0.2 BIGALD2 ... etc.             ', &
     '   TOLOOH + OH --> TOLO2                                                                            ', &
     '        PBZNIT --> ACBZO2 + NO2                                                                     ', &
     ' XYLENO2 + HO2 --> XYLENOOH                                                                         ', &
     '  XYLENO2 + NO --> 0.34 PGLYX + 0.54 PMGLY + 0.2 PDCB1 + 0.42 PDCB2 + 0.2 BIGALD2 ... etc.          ', &
     ' XYLENOOH + OH --> XYLENO2                                                                          ', &
     ' XYLOLO2 + HO2 --> XYLOLOOH                                                                         ', &
     '  XYLOLO2 + NO --> 0.17 PGLYX + 0.51 PMGLY + 0.17 GLYX + 0.51 MGLY + NO2 ... etc.                   ', &
     '    XYLOL + OH --> 0.07 PHENO + 0.3 XYLOLO2 + 0.63 HO2                                              ', &
     ' XYLOLOOH + OH --> XYLOLO2                                                                          ', &
     '       BENZOOH --> PGLYX + 0.5 BIGALD1 + GLYX + OH + HO2                                            ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_15 = (/ &
     '       BIGALD1 --> 0.6 MALO2 + HO2                                                                  ', &
     '       BIGALD2 --> 0.7 DICARBO2 + 0.6 HO2                                                           ', &
     '       BIGALD3 --> 0.6 MDIALO2 + 0.6 CO + 0.6 HO2                                                   ', &
     '       BIGALD4 --> MGLY + MCO3 + CO + HO2                                                           ', &
     '         BZOOH --> BZALD + OH + HO2                                                                 ', &
     '       C6H5OOH --> PHENO + OH                                                                       ', &
     '       PHENOOH --> 0.7 PGLYX + 0.7 GLYX + OH + HO2                                                  ', &
     '       BEPOMUC --> BIGALD1 + 1.5 CO + 1.5 HO2                                                       ', &
     '       TEPOMUC --> 0.5 MCO3 + 1.5 CO + HO2                                                          ', &
     '        TOLOOH --> 0.6 PGLYX + 0.4 PMGLY + 0.2 BIGALD2 + 0.2 BIGALD1 + 0.2 BIGALD3 ... etc.         ', &
     '      XYLENOOH --> 0.34 PGLYX + 0.54 PMGLY + 0.2 BIGALD2 + 0.21 BIGALD4 ... etc.                    ', &
     '      XYLOLOOH --> 0.17 PGLYX + 0.51 PMGLY + 0.17 GLYX + 0.51 MGLY + OH ... etc.                    ', &
     '            O2 --> CH4m                                                                             ', &
     '            O2 --> COm                                                                              ', &
     '            O2 --> O3                                                                               ', &
     '            O2 --> CH2Om                                                                            ', &
     '            O2 --> NO                                                                               ', &
     '            O2 --> BENZ                                                                             ', &
     '            O2 --> TOLU                                                                             ', &
     '            O2 --> XYLE                                                                             ', &
     '          A3O2 --> O2                                                                               ', &
     '          ACET --> O2                                                                               ', &
     '          ACTA --> O2                                                                               ', &
     '          ALD2 --> O2                                                                               ', &
     '          ALK4 --> O2                                                                               ', &
     '          ATO2 --> O2                                                                               ', &
     '         ATOOH --> O2                                                                               ', &
     '          B3O2 --> O2                                                                               ', &
     '          BENZ --> O2                                                                               ', &
     '          C2H4 --> O2                                                                               ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_16 = (/ &
     '          C2H6 --> O2                                                                               ', &
     '          C3H8 --> O2                                                                               ', &
     '          CH2O --> PCH2O + O2                                                                       ', &
     '         CH2OO --> O2                                                                               ', &
     '       CH3CHOO --> O2                                                                               ', &
     '            CO --> O2                                                                               ', &
     '           CO2 --> O2                                                                               ', &
     '          DHDN --> O2                                                                               ', &
     '          DHDC --> O2                                                                               ', &
     '         DHMOB --> O2                                                                               ', &
     '       DHPCARP --> O2                                                                               ', &
     '         DIBOO --> O2                                                                               ', &
     '           EOH --> O2                                                                               ', &
     '         ETHLN --> O2                                                                               ', &
     '          ETO2 --> O2                                                                               ', &
     '           ETP --> O2                                                                               ', &
     '          GAOO --> O2                                                                               ', &
     '          GLYC --> O2                                                                               ', &
     '          GLYX --> O2                                                                               ', &
     '          H2O2 --> O2                                                                               ', &
     '           HAC --> O2                                                                               ', &
     '         HC187 --> O2                                                                               ', &
     '           HC5 --> O2                                                                               ', &
     '         HC5OO --> O2                                                                               ', &
     '         HCOOH --> O2                                                                               ', &
     '          HNO2 --> O2                                                                               ', &
     '          HNO3 --> O2                                                                               ', &
     '          HNO4 --> O2                                                                               ', &
     '           HO2 --> O2                                                                               ', &
     '         HPALD --> O2                                                                               ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_17 = (/ &
     '       HPC52O2 --> O2                                                                               ', &
     '           IAP --> O2                                                                               ', &
     '        IEPOXA --> O2                                                                               ', &
     '        IEPOXB --> O2                                                                               ', &
     '        IEPOXD --> O2                                                                               ', &
     '       IEPOXOO --> O2                                                                               ', &
     '          IMAE --> O2                                                                               ', &
     '         IMAO3 --> O2                                                                               ', &
     '          INO2 --> O2                                                                               ', &
     '          INPN --> O2                                                                               ', &
     '          IPMN --> O2                                                                               ', &
     '          ISN1 --> O2                                                                               ', &
     '        ISN1OG --> O2                                                                               ', &
     '        ISNOOA --> O2                                                                               ', &
     '        ISNOOB --> O2                                                                               ', &
     '       ISNOHOO --> O2                                                                               ', &
     '          ISNP --> O2                                                                               ', &
     '          ISOP --> O2                                                                               ', &
     '        ISOPNB --> O2                                                                               ', &
     '      ISOPNBO2 --> O2                                                                               ', &
     '        ISOPND --> O2                                                                               ', &
     '      ISOPNDO2 --> O2                                                                               ', &
     '           KO2 --> O2                                                                               ', &
     '          LVOC --> O2                                                                               ', &
     '          MACR --> O2                                                                               ', &
     '         MACRN --> O2                                                                               ', &
     '       MACRNO2 --> O2                                                                               ', &
     '        MACROO --> O2                                                                               ', &
     '          MAN2 --> O2                                                                               ', &
     '          MAOP --> O2                                                                               ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_18 = (/ &
     '        MAOPO2 --> O2                                                                               ', &
     '           MAP --> O2                                                                               ', &
     '           MBO --> O2                                                                               ', &
     '         MBOOO --> O2                                                                               ', &
     '          MCO3 --> O2                                                                               ', &
     '           MEK --> O2                                                                               ', &
     '         MGLOO --> O2                                                                               ', &
     '          MGLY --> O2                                                                               ', &
     '        MGLYOO --> O2                                                                               ', &
     '          MOBA --> O2                                                                               ', &
     '        MOBAOO --> O2                                                                               ', &
     '           MO2 --> O2                                                                               ', &
     '            MP --> O2                                                                               ', &
     '           MPN --> O2                                                                               ', &
     '          MRO2 --> O2                                                                               ', &
     '           MRP --> O2                                                                               ', &
     '           MVK --> O2                                                                               ', &
     '          MVKN --> O2                                                                               ', &
     '         MVKOO --> O2                                                                               ', &
     '          N2O5 --> O2                                                                               ', &
     '         NMAO3 --> O2                                                                               ', &
     '            NO --> O2                                                                               ', &
     '           NO2 --> O2                                                                               ', &
     '           NO3 --> O2                                                                               ', &
     '          NPMN --> O2                                                                               ', &
     '           O1D --> O2                                                                               ', &
     '            O3 --> O2                                                                               ', &
     '            OH --> O2                                                                               ', &
     '           PAN --> O2                                                                               ', &
     '          PMNN --> O2                                                                               ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_19 = (/ &
     '         PMNO2 --> O2                                                                               ', &
     '           PO2 --> O2                                                                               ', &
     '            PP --> O2                                                                               ', &
     '           PPN --> O2                                                                               ', &
     '          PRN1 --> O2                                                                               ', &
     '          PRPE --> O2                                                                               ', &
     '          PRPN --> O2                                                                               ', &
     '        PROPNN --> O2                                                                               ', &
     '          PYAC --> O2                                                                               ', &
     '          R4N1 --> O2                                                                               ', &
     '          R4N2 --> O2                                                                               ', &
     '          R4O2 --> O2                                                                               ', &
     '           R4P --> O2                                                                               ', &
     '          RA3P --> O2                                                                               ', &
     '          RB3P --> O2                                                                               ', &
     '          RCHO --> O2                                                                               ', &
     '          RCO3 --> O2                                                                               ', &
     '          RIO2 --> O2                                                                               ', &
     '          RIPA --> O2                                                                               ', &
     '          RIPB --> O2                                                                               ', &
     '          RIPD --> O2                                                                               ', &
     '           ROH --> O2                                                                               ', &
     '            RP --> O2                                                                               ', &
     '          TOLU --> O2                                                                               ', &
     '          VRO2 --> O2                                                                               ', &
     '           VRP --> O2                                                                               ', &
     '          XYLE --> O2                                                                               ', &
     '           CH4 --> O2                                                                               ', &
     '             H --> O2                                                                               ', &
     '            H2 --> O2                                                                               ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(30) :: EQN_NAMES_20 = (/ &
     '          MNO3 --> O2                                                                               ', &
     '           MOH --> O2                                                                               ', &
     '             O --> O2                                                                               ', &
     '         RCOOH --> O2                                                                               ', &
     '          BRO2 --> O2                                                                               ', &
     '          XRO2 --> O2                                                                               ', &
     '          TRO2 --> O2                                                                               ', &
     '          CH4m --> O2                                                                               ', &
     '           COm --> O2                                                                               ', &
     '         CH2Om --> O2                                                                               ', &
     '          MO2m --> O2                                                                               ', &
     '           MPm --> O2                                                                               ', &
     '          MPNm --> O2                                                                               ', &
     '          MOHm --> O2                                                                               ', &
     '        BENZO2 --> O2                                                                               ', &
     '       BEPOMUC --> O2                                                                               ', &
     '         TOLO2 --> O2                                                                               ', &
     '       TEPOMUC --> O2                                                                               ', &
     '         XYLOL --> O2                                                                               ', &
     '        PHENOL --> O2                                                                               ', &
     '        CRESOL --> O2                                                                               ', &
     '       XYLENO2 --> O2                                                                               ', &
     '       BENZOOH --> O2                                                                               ', &
     '       BIGALD1 --> O2                                                                               ', &
     '       BIGALD2 --> O2                                                                               ', &
     '       BIGALD3 --> O2                                                                               ', &
     '       BIGALD4 --> O2                                                                               ', &
     '        ACBZO2 --> O2                                                                               ', &
     '          BZOO --> O2                                                                               ', &
     '         BZALD --> O2                                                                               ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(14) :: EQN_NAMES_21 = (/ &
     '         BZOOH --> O2                                                                               ', &
     '        C6H5O2 --> O2                                                                               ', &
     '       C6H5OOH --> O2                                                                               ', &
     '      DICARBO2 --> O2                                                                               ', &
     '         MALO2 --> O2                                                                               ', &
     '       MDIALO2 --> O2                                                                               ', &
     '        PHENO2 --> O2                                                                               ', &
     '         PHENO --> O2                                                                               ', &
     '        TOLOOH --> O2                                                                               ', &
     '        PBZNIT --> O2                                                                               ', &
     '       XYLOLO2 --> O2                                                                               ', &
     '      XYLOLOOH --> O2                                                                               ', &
     '      XYLENOOH --> O2                                                                               ', &
     '       PHENOOH --> O2                                                                               ' /)
  CHARACTER(LEN=100), PARAMETER, DIMENSION(644) :: EQN_NAMES = (/&
    EQN_NAMES_0, EQN_NAMES_1, EQN_NAMES_2, EQN_NAMES_3, EQN_NAMES_4, &
    EQN_NAMES_5, EQN_NAMES_6, EQN_NAMES_7, EQN_NAMES_8, EQN_NAMES_9, &
    EQN_NAMES_10, EQN_NAMES_11, EQN_NAMES_12, EQN_NAMES_13, EQN_NAMES_14, &
    EQN_NAMES_15, EQN_NAMES_16, EQN_NAMES_17, EQN_NAMES_18, EQN_NAMES_19, &
    EQN_NAMES_20, EQN_NAMES_21 /)

! INLINED global variables

! End INLINED global variables


END MODULE aromatics_kpp_Monitor
